home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Auge 4000
/
Auge 4000 #45 (1990-06-20)(Amiga User Gruppe Einzugsgebiet 4000).zip
/
Auge 4000 #45 (1990-06-20)(Amiga User Gruppe Einzugsgebiet 4000).adf
/
ANWENDUNGEN
/
FUNKUHR
/
FUNKUHR.GFA
(
.txt
)
< prev
next >
Wrap
GFA-BASIC Amiga
|
1990-06-20
|
3KB
|
44 lines
GFA-AMIGAB
FEHLER
DATUM
BREAK
PULSE
FEHLER
Nehmt die Zeile mal weg - und staund
Hauptprogramm Ver 0.02
Warten...F
Auf Minutenbeginn warten
Garbage-Collection
Bits einlesen - was sonst?
Auweia - ein Fehler!
Fehler aufgetreten?
Dekodierung der Daten und Parit
LPRINT zeit$;" ";datum$;" ";wtg&
Auf Minutenbeginn warten
"7
F
Daten
Montag,Dienstag,Mittwoch,Donnerstag,Freitag,Samstag,Sonntag
Unterprogramme
Variablen
GLOBAL break%
Eigentlich
berfl
ssig...
Zeiten stoppen
Ende der Pause abwarten
Zeit f
r Pausenl
nge merken
Impuls stoppen
Auswertung
Pause zu lang oder zu kurz?
Fehler - kein Wert zur
ck, Errorflag setzen
Bit ausrechnen
Minutenbeginn?
Flag f
r Minutenbeginn setzen
noch aufr
umen...